home *** CD-ROM | disk | FTP | other *** search
-
-
-
- ccccffffffffttttmmmm1111dddd,,,,zzzzffffffffttttmmmm1111dddd((((3333FFFF)))) ccccffffffffttttmmmm1111dddd,,,,zzzzffffffffttttmmmm1111dddd((((3333FFFF))))
-
-
-
- NNNNAAAAMMMMEEEE
- ccccffffffffttttmmmm1111dddd,,,, zzzzffffffffttttmmmm1111dddd ---- Multiple 1D, complex-to-complex, Fast Fourier
- Transforms.
-
- SSSSYYYYNNNNOOOOPPPPSSSSYYYYSSSS
- _F_o_r_t_r_a_n :
- ssssuuuubbbbrrrroooouuuuttttiiiinnnneeee ccccffffffffttttmmmm1111dddd(((( ssssiiiiggggnnnn,,,, nnnn,,,, pppp,,,, aaaarrrrrrrraaaayyyy,,,, iiiinnnncccc,,,, llllddddaaaa,,,, ccccooooeeeeffff ))))
- iiiinnnntttteeeeggggeeeerrrr ssssiiiiggggnnnn,,,, nnnn,,,, pppp,,,, iiiinnnncccc,,,, llllddddaaaa
- ccccoooommmmpppplllleeeexxxx aaaarrrrrrrraaaayyyy((((llllddddaaaa,,,,pppp)))),,,, ccccooooeeeeffff((((nnnn++++11115555))))
-
- ssssuuuubbbbrrrroooouuuuttttiiiinnnneeee zzzzffffffffttttmmmm1111dddd(((( ssssiiiiggggnnnn,,,, nnnn,,,, pppp,,,, aaaarrrrrrrraaaayyyy,,,, iiiinnnncccc,,,, llllddddaaaa,,,, ccccooooeeeeffff ))))
- iiiinnnntttteeeeggggeeeerrrr ssssiiiiggggnnnn,,,, nnnn,,,, pppp,,,, iiiinnnncccc,,,, llllddddaaaa
- ddddoooouuuubbbblllleeee ccccoooommmmpppplllleeeexxxx aaaarrrrrrrraaaayyyy((((llllddddaaaa,,,,pppp)))),,,, ccccooooeeeeffff((((nnnn++++11115555))))
-
-
- _C :
- ####iiiinnnncccclllluuuuddddeeee <<<<fffffffftttt....hhhh>>>>
- iiiinnnntttt ccccffffffffttttmmmm1111dddd (((( iiiinnnntttt ssssiiiiggggnnnn,,,, iiiinnnntttt nnnn,,,, iiiinnnntttt pppp,,,, ccccoooommmmpppplllleeeexxxx ****aaaarrrrrrrraaaayyyy,,,,
- iiiinnnntttt iiiinnnncccc,,,, iiiinnnntttt llllddddaaaa,,,, ccccoooommmmpppplllleeeexxxx ****ccccooooeeeeffff))));;;;
- iiiinnnntttt zzzzffffffffttttmmmm1111dddd (((( iiiinnnntttt ssssiiiiggggnnnn,,,, iiiinnnntttt nnnn,,,, iiiinnnntttt pppp,,,, zzzzoooommmmpppplllleeeexxxx ****aaaarrrrrrrraaaayyyy,,,,
- iiiinnnntttt iiiinnnncccc,,,, iiiinnnntttt llllddddaaaa,,,, zzzzoooommmmpppplllleeeexxxx ****ccccooooeeeeffff))));;;;
-
-
- DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN
- ccccffffffffttttmmmm1111dddd and zzzzffffffffttttmmmm1111dddd compute the complex Fourier transform of P complex
- sequences of N samples each. The k-th index F(k) of the Transform of an N
- sample sequence f(i) is equal to:
- F(k) = Sum ( W^(i*k) * f(i) ), for i =0, ..., (N-1)
- W = exp( (Sign*2*sqrt(-1)*PI) / N )
-
-
- The Fourier transforms are computed in-place so the input sequence is
- overwritten by the Fourier transform output.
-
-
- PPPPAAAARRRRAAAAMMMMEEEETTTTEEEERRRRSSSS
- SSSSIIIIGGGGNNNN ---- Integer specifying which sign to be used for the expression of W
- (see above) - must be either +1 or -1.
- Unchanged on exit.
-
- NNNN ---- Integer, the number of samples in each sequence.
- Unchanged on exit.
-
- PPPP ---- Integer, the number of sequences. Unchanged on exit.
-
- AAAARRRRRRRRAAAAYYYY ---- Array containing the samples of the sequence to be transformed.
- On input, the element "i" of the sequence "j" is stored as A(i*inc,j) in
- _F_o_r_t_r_a_n , and A[i*inc+j*lda] in _C.
- On exit, the array is overwritten by its transform.
-
-
-
-
-
-
- PPPPaaaaggggeeee 1111
-
-
-
-
-
-
- ccccffffffffttttmmmm1111dddd,,,,zzzzffffffffttttmmmm1111dddd((((3333FFFF)))) ccccffffffffttttmmmm1111dddd,,,,zzzzffffffffttttmmmm1111dddd((((3333FFFF))))
-
-
-
- IIIINNNNCCCC ---- Integer, increment between two consecutive elements of a sequence.
- Unchanged on exit.
-
- LLLLDDDDAAAA ---- Integer, leading dimension: increment between the first samples of
- two consecutive sequences. Unchanged on exit.
-
- CCCCOOOOEEEEFFFFFFFF ---- Array of at least ( N + 15 ) elements. On entry it contains the
- Sines/Cosines and factorization of N. COEFF needs to be initialized with
- a call to cfftm1di or zfftm1di. Unchanged on exit.
-
-
- EEEExxxxaaaammmmpppplllleeee ooooffff CCCCaaaalllllllliiiinnnngggg SSSSeeeeqqqquuuueeeennnncccceeee
- Compute 1D FFTs computed for 64 sequences of 1024 complex values each.
- The elements of each sequence are stored with increment (stride) 1, and
- the offset between the first element of two succesive sequences (leading
- dimension) is 2049.
- _F_o_r_t_r_a_n
- complex array(0:2049-1,0:64-1), coeff(1024+15)
- call cfftm1di( 1024, coeff)
- call cfftm1d( -1, 1024, 64, array, 1, 2049, coeff)
-
- _C
- #include <fft.h>
- complex array[64*2049], *coeff;
- coeff = cfftm1di( 1024, NULL);
- cfftm1d( -1, 1024, 64, array, 1, 2049, coeff);
-
-
- SSSSEEEEEEEE AAAALLLLSSSSOOOO
- fft, cfftm1di, zfftm1di
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
-
- PPPPaaaaggggeeee 2222
-
-
-
-